﻿Public Class MyDate
  Public Shared MDate As DateTime
  Public Shared Operator +(ByVal pdata _
          As MyDate, _
          ByVal obj2 As Integer) As DateTime
    Return MDate.AddDays(obj2)
  End Operator

  Public Shared Operator +(ByVal obj2 _
          As Integer, _
          ByVal pdata As MyDate) As DateTime
    Return MDate.AddDays(obj2)
  End Operator
End Class

